wardrobe <-
function(id, lazzy=T) UseMethod("wardrobe")
